PC World 2006 July & August/PCWorld_2006-07-08_cd.bin/v cisle/acehtml/acehtmlfreeware.exe/acehtmlfree.exe/0/RCDATA/TPTFRMOPENDLG/TPTFRMOPENDLG.txt

Text File | 2006-04-19 | 11KB | 383 lines

object PTFrmOpenDlg: TPTFrmOpenDlg
  Left = 565
  Top = 448
  ActiveControl = FileNameEdt
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'Open'
  ClientHeight = 265
  ClientWidth = 451
  Color = clBtnFace
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  ShowHint = True
  OnCloseQuery = FormCloseQuery
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object LookInTxt: TLabel
    Left = 8
    Top = 8
    Width = 38
    Height = 13
    Caption = 'Look &in:'
    FocusControl = PTShellCombo1
  end
  object UpOneLevelBtn: TSpeedButton
    Left = 272
    Top = 4
    Width = 23
    Height = 22
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
      2222222222222222222200000000000000020FBFBFBFBFBFBF020BFBFBFBFBFB
      FB020FBFB000000FBF020BFBF0FBFBFBFB020FBFB0BFBFBFBF020BF00000FBFB
      FB020FBF000FBFBFBF020BFBF0FBFBFBFB020FBFBFBFBFBFBF02000000000000
      002220BFBFB02222222222000002222222222222222222222222}
    OnClick = UpOneLevelBtnClick
  end
  object CreateNewFolderBtn: TSpeedButton
    Left = 336
    Top = 4
    Width = 23
    Height = 22
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333FFFFFFFFFFF3330000000000033333388888888888F3330BFBFBFBFB0
      33333383333333338F3330FBFBFBFBF033333383333333338F3330BFBFBFBFB0
      33333383333333338F3330FBFBFBFBF033033383333333338F3830BFBFBFBFB0
      30333383333333338F8F30FBFBFBFBF0033333833333333388F3300000000003
      3030338888888888338F330BFBF03303033333383333833838F3333000033030
      30333333888833838F8F33333333033333033333333338F33338333333333330
      33333333333333338F3333333333333333333333333333333333333333333330
      33333333333333338F3333333333333333333333333333333333}
    NumGlyphs = 2
    OnClick = CreateNewFolderBtnClick
  end
  object ShowTreeBtn: TSpeedButton
    Left = 368
    Top = 4
    Width = 23
    Height = 23
    AllowAllUp = True
    GroupIndex = 2
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333300033333333300030F03333333330333000333333333033333333
      00033330333300030F0333303333033300033330333333333333333033300033
      333333300030F033333333303330003333333333333333333333330003333333
      3333330F03333333333333000333333333333333333333333333}
    OnClick = ShowTreeBtnClick
  end
  object ShowDesktopBtn: TSpeedButton
    Left = 304
    Top = 4
    Width = 23
    Height = 22
    Hint = 'Show Desktop'
    Glyph.Data = {
      FE000000424DFE00000000000000760000002800000010000000110000000100
      0400000000008800000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
      DDDD0000000000000000666C8888888C6CC06EC777777777C7C06C7770877777
      7C6067F70708777777C08F707F70877777808F07FFF7087777808F78FF0F7077
      77808FF78F330877778067FF783B308777406C7FF783B30874C066C7FF7F3B30
      47C06E6C7FFFF3B30CC066666888883B3080DDDDDDDDDDD391DDDDDDDDDDDDDD
      11DD}
    OnClick = ShowDesktopBtnClick
  end
  object ViewBtn: TSpeedButton
    Tag = 3
    Left = 399
    Top = 4
    Width = 34
    Height = 23
    AllowAllUp = True
    Glyph.Data = {
      2A010000424D2A010000000000007600000028000000170000000F0000000100
      040000000000B4000000130B0000130B00001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
      DDDDDDDDDDD00000000000000000DDDDDDD00FFFFFFFFFFFFFF0DDDDDDD00F44
      FFFFF44FFFF0DDDDDDD00F84F00FF74F00F0DDDDDDD00FFFFFFFFFFFFFF0DDDD
      DDD00F44FFFFF44FFFF0DDDD0DD00F84F00FF84F00F0DDD000D00FFFFFFFFFFF
      FFF0DD0000000F44FFFFF44FFFF0DDDDDDD00F84F00FF84F00F0DDDDDDD00FFF
      FFFFFFFFFFF0DDDDDDD00000000000000000DDDDDDD00CCCCCCCCCCCCCC0DDDD
      DDD00000000000000000DDDDDDD0}
    OnMouseDown = ViewBtnMouseDown
  end
  object PTShellCombo1: TPTShellCombo
    Left = 72
    Top = 4
    Width = 193
    Height = 22
    HelpContext = 28456
    ShellList = PTShellList1
    Options = [ptscoAutofill]
    DropDownCount = 16
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 0
    Top = 181
    Width = 451
    Height = 84
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 2
    object FileNameTxt: TLabel
      Left = 8
      Top = 10
      Width = 48
      Height = 13
      Caption = 'File &name:'
      FocusControl = FileNameEdt
    end
    object FilesOfTypeTxt: TLabel
      Left = 8
      Top = 38
      Width = 59
      Height = 13
      Caption = 'Files of &type:'
      FocusControl = FileTypesCbx
    end
    object FileNameEdt: TEdit
      Left = 88
      Top = 6
      Width = 277
      Height = 21
      TabOrder = 0
      OnChange = FileNameEdtChange
    end
    object FileNameCbx: TComboBox
      Left = 88
      Top = 6
      Width = 277
      Height = 21
      ItemHeight = 13
      TabOrder = 4
      TabStop = False
      Visible = False
    end
    object FileTypesCbx: TPTCombobox
      Left = 88
      Top = 34
      Width = 277
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 1
      OnSelEndOk = FileTypesCbxSelEndOk
    end
    object OpenBtn: TButton
      Left = 372
      Top = 4
      Width = 75
      Height = 23
      HelpContext = 28529
      Caption = '&Open'
      Default = True
      ModalResult = 1
      TabOrder = 2
    end
    object CancelBtn: TButton
      Left = 372
      Top = 32
      Width = 75
      Height = 23
      HelpContext = 28444
      Cancel = True
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 3
    end
    object ReadOnlyChk: TCheckBox
      Left = 88
      Top = 60
      Width = 233
      Height = 17
      Caption = 'Open as &read-only'
      TabOrder = 5
      OnClick = ReadOnlyChkClick
    end
    object HelpBtn: TButton
      Left = 372
      Top = 60
      Width = 75
      Height = 23
      Caption = '&Help'
      TabOrder = 6
      Visible = False
      OnClick = HelpBtnClick
    end
  end
  object SplitterContainer: TPTGroup
    Left = 2
    Top = 30
    Width = 447
    Height = 153
    FrameStyle = ptfsNone
    TabOrder = 1
    object PTSplitter1: TPTSplitter
      Left = 0
      Top = 0
      Width = 447
      Height = 153
      Align = alClient
      Color = clBtnFace
      ParentColor = False
      Position = 141
      SplitterWidth = 5
      TabOrder = 0
      object PTSplitter1_pane1: TPTPane
        Left = 0
        Top = 0
        Width = 141
        Height = 153
        TabOrder = 0
        MinSize = 4
        Index = 0
        object PTShellTree1: TPTShellTree
          Left = 0
          Top = 0
          Width = 137
          Height = 149
          Options = [ptstoAutoFill, ptstoDefaultKeyHandling, ptstoContextMenus, ptstoDynamicRefresh]
          BorderStyle = bsNone
          DragMode = dmAutomatic
          HideSelection = False
          Indent = 19
          OnChange = PTShellTree1Change
          Align = alClient
          TabOrder = 0
        end
      end
      object PTSplitter1_pane2: TPTPane
        Left = 146
        Top = 0
        Width = 301
        Height = 153
        TabOrder = 1
        MinSize = 60
        Index = 1
        object PTShellList1: TPTShellList
          Left = 0
          Top = 0
          Width = 297
          Height = 149
          HelpContext = 28549
          Options = [ptsloAutoFill, ptsloDefaultKeyHandling, ptsloContextMenus, ptsloDynamicRefresh]
          OnFolderChanged = PTShellList1FolderChanged
          Align = alClient
          BorderStyle = bsNone
          HideSelection = False
          IconOptions.AutoArrange = True
          OnChange = PTShellList1Change
          PopupMenu = LvPopup
          TabOrder = 0
          ViewStyle = vsList
        end
      end
    end
  end
  object LvPopup: TPopupMenu
    Left = 384
    Top = 48
    object View1Mitm: TMenuItem
      Caption = '&View'
      object LargeIcons1Mitm: TMenuItem
        Caption = 'Lar&ge icons'
        RadioItem = True
        OnClick = ViewBtnClick
      end
      object Smallicons1MItm: TMenuItem
        Tag = 1
        Caption = 'S&mall icons'
        RadioItem = True
        OnClick = ViewBtnClick
      end
      object List1Mitm: TMenuItem
        Tag = 2
        Caption = '&List'
        Checked = True
        RadioItem = True
        OnClick = ViewBtnClick
      end
      object Details1Mitm: TMenuItem
        Tag = 3
        Caption = '&Details'
        RadioItem = True
        OnClick = ViewBtnClick
      end
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Paste1Mitm: TMenuItem
      Caption = '&Paste'
      OnClick = Paste1MitmClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object New1Mitm: TMenuItem
      Caption = 'Ne&w'
      object Folder1Mitm: TMenuItem
        Caption = '&Folder'
        OnClick = CreateNewFolderBtnClick
      end
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object Properties1Mitm: TMenuItem
      Caption = 'P&roperties'
      OnClick = Properties1MitmClick
    end
  end
  object ViewPopupMenu: TPopupMenu
    Left = 380
    Top = 78
    object LargeIcons2Mitm: TMenuItem
      Caption = 'Lar&ge icons'
      RadioItem = True
      OnClick = ViewBtnClick
    end
    object SmallIcons2Mitm: TMenuItem
      Tag = 1
      Caption = 'S&mall icons'
      RadioItem = True
      OnClick = ViewBtnClick
    end
    object List2Mitm: TMenuItem
      Tag = 2
      Caption = '&List'
      Checked = True
      RadioItem = True
      OnClick = ViewBtnClick
    end
    object Details2Mitm: TMenuItem
      Tag = 3
      Caption = '&Details'
      RadioItem = True
      OnClick = ViewBtnClick
    end
  end
end